Ì i 2
mis.room (main)
[mnemonic]
\GGR[ggr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L ggr
accomodation 10 FREE L MIS.ACCOM.DICT \GGR[ggr]|4
active 1 YN L \GGR[ggr]|0
bed.count 2 INT R \GGR[ggr]|10
check.accom 1 YN L \GGR[ggr]|8
check.housekeeping 1 YN L \GGR[ggr]|11
check.service 1 YN L \GGR[ggr]|7
check.sex 1 YN L \GGR[ggr]|6
check.smoking 1 YN L \GGR[ggr]|9
last.update 10 PINT R \GGR[ggr]UPD
location 10 FREE L MIS.LOCN.DICT \GGR[ggr]|2
not.full 1 YN L VAL=("N"^X,DO{@Next(MIS.ROOM.DICT.bed) IF{@ADM.PAT.rbi
VAL=.urn;@Z.del^MIS.ROOM.DICT.bed,"Y"^X}},X)
not.full.or.all 1 YN L VAL=IF{L("Nn",c.yes.no)<2 "Y";@MIS.ROOM.DICT.not.fu
VAL=ll}
overflow.loc 1 YN L \GGR[ggr]|5
room.facility 10 FREE L MIS.FACILITY VAL=(@Last(facility))
service 10 FREE L MIS.SVC.DICT \GGR[ggr]|3
Ì € i 2
mis.room.beds (beds)
[mnemonic, bed]
\GGR[ggr]B[ggrB]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bed 3 FREE L ggrB
bed.phone 10 FREE L \GGR[ggr]B[ggrB]|0
Ì € i 2
mis.room.dict.queries (customer.defined.queries)
[mnemonic, cd.query]
\GGR[ggr]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query 10 FREE L MIS.QUERY ggv
cd.response 75 QRY.RESP L \GGR[ggr]CD[ggv]|0
Ì € i 2
mis.room.dict.mult.queries (multiple.queries)
[mnemonic,cd.query, cdm.seq.no]
\GGR[ggr]CD[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cdm.seq.no 3 PINT R ggvN
cdm.response 75 QRY.RESP L \GGR[ggr]CD[ggv]M[ggvN]|0
Ì € i 2
mis.room.facilities (facilities)
[mnemonic, facility]
\GGR[ggr]FAC[gqbf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
facility 10 FREE L MIS.FACILITY gqbf
Ì € i 2
mis.room.rate.accomms (rate.accoms)
[mnemonic, rate.accom]
\GGR[ggr]R[ggrR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rate.accom 10 FREE L MIS.ACCOM.DICT ggrR
procedure 10 FREE L \GGR[ggr]R[ggrR]|0
Ì € i 2
services (zcus.services)
[mnemonic, zcus.service]
\GGR[ggr]ZCUS.S[ggs]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.service 10 FREE L MIS.SVC.DICT ggs
zcus.service.beds 3 PINT R \GGR[ggr]ZCUS.S[ggs]|0
zcus.service.service 10 FREE L MIS.SVC.DICT \GGR[ggr]ZCUS.S[ggs]|1
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
mis.room.dict.queries.conv.x [mnemonic,cd.query] = cd.response
conversion.x \GGRQC[ggr,ggv]
mis.room.loc.svc.index [location,service,mnemonic]
location.service.x \GGRX[ggn,ggs,ggr]
mis.room.loc.index [location,mnemonic]
location.x \GGRI[ggn,ggr]
mis.room.svc.loc.index [service,location,mnemonic]
service.location.x \GGRY[ggs,ggn,ggr]
|
|
| | | | | |